home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 41 / Amiga Format CD41 (1999-06)(Future Publishing)(GB)[!][issue 1999-07].iso / -seriously_amiga- / programming / other / gui4cli / tools / rexx / g4c.rexx
OS/2 REXX Batch file  |  1999-04-29  |  406b  |  22 lines
  1. /*  Rexx script to talk to Gui4Cli  */
  2. /*  Run this script from a shell by writting RX G4C */
  3. /*  You can then write commands to Gui4Cli - <Ctrl-C> exits  */
  4.  
  5. address 'Gui4Cli'
  6. options results
  7.  
  8. signal on BREAK_C
  9.  
  10. do forever
  11.   say "G4C>"
  12.   pull command
  13.   interpret command
  14.   if RC = 0 then say "OK"
  15.   else say "Command returned: " RC
  16.   if result ~= "RESULT" then say result
  17.   drop result
  18. end
  19.  
  20. BREAK_C:
  21. exit
  22.